home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 3 / Cream of the Crop 3.iso / clipper / ks94an.zip / __LPRINT.HDR < prev    next >
Text File  |  1994-04-25  |  2KB  |  68 lines
  1. /******************************************************************************
  2.                  The Klipper Library, for CA-Clipper 5.x
  3.         Copyright (c), 1994, Wallace Information Systems Engineering
  4.  
  5. FUNCTION:
  6.  
  7. _LPrint( cPtrData, lCrLf ) --> NIL
  8.  
  9. PARAMETERS:
  10.  
  11. cPtrData : Character data to print on printer
  12. lCrLf    : Logical TRUE = issue CRLF pair after data (DEFAULT)
  13.            FALSE = append data to printer current line
  14.  
  15. SHORT:
  16.  
  17. Print text directly to the printer.
  18.  
  19. DESCRIPTION:
  20.  
  21. _LPrint() writes the contents of cPtrData to the printer regardless of
  22. current printer settings, and restores the printer settings to the state they
  23. were in before the call.
  24.  
  25. lNoCrLf controls whether or not to append a CRLF pair after the data has been
  26. printed.  If TRUE, the effect is QOUT()/?, if FALSE, QQOUT()/??.
  27.  
  28. NOTE:
  29.  
  30.  
  31.  
  32. EXAMPLE:
  33.  
  34. SET PRINT ON
  35. SET DEVICE TO PRINT
  36. SET CONSOLE OFF
  37.  
  38. _LPrint(chr(27)+'E')
  39.  
  40. Result: ESC-E is written to the printer and the status of SET PRINT,
  41. SET DEVICE, and SET CONSOLE remain the same when the function returns.
  42.  
  43. SET PRINT OFF
  44. SET DEVICE TO SCREEN
  45. SET CONSOLE ON
  46.  
  47. _LPrint(chr(27)+'E')
  48.  
  49. Result: Same as above.  String is written to printer regardless of current
  50. SET PRINT, DEVICE and CONSOLE settings. Original Settings are restored
  51. after use.
  52.  
  53. #define LP_APPEND .F.
  54.  
  55. _LPrint('ABC')
  56. _LPrint('DEF')
  57.  
  58. Result (on printer):
  59. ABC
  60. DEF
  61.  
  62. _LPrint('ABC')
  63. _LPrint('DEF',LP_APPEND)
  64.  
  65. Result (on printer): ABCDEF
  66.  
  67. ******************************************************************************/
  68.